--[[
    编码: JX-60-16
    名称: 出库波次-强制完成(后台)
    作者：HAN    
    日期：2025-2-20
       
    入口函数： ForceFinish

    功能说明:
        出库波次 WFP 处理强制完成

    更改记录:

--]]

wms_op = require( "wms_operation" )
wms_cntr = require( "wms_container" )
jx_base = require( "jx_base" )

function ForceFinish ( strLuaDEID ) 
    local nRet, strRetInfo
    local outbound_wave = {}
    nRet, outbound_wave = m3.GetSysCurEditDataObj( strLuaDEID, "Outbound_Wave" )
    if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "获取【出库波次】对象属性失败!"..outbound_wave ) end
    
    if ( outbound_wave.b_state == 0 or outbound_wave.b_state == 2) then
        -- 0 未配货 2 -- 配货完成
        -- 把出库波次设置为完成，并且关闭数量=出库数量
        nRet, strRetInfo = jx_base.Set_Outbound_Wave_Force_Finish( strLuaDEID, outbound_wave.wave_no )
        if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo )  end
    elseif ( outbound_wave.b_state == 3 or outbound_wave.b_state == 7 or outbound_wave.b_state == 8 ) then
        -- 3/执行  7/暂停 8/关闭中
        -- 判断这个出库波次的作业是否还有在执行中的，如果有就不能马上关闭，只能设置为关闭中，等执行中的作业完成后才能设置为关闭，这个另外程序来处理
        -- 判断是否有存在正在执行的作业 N_B_STATE = 1
        strCondition = "S_BS_TYPE = 'Outbound_Wave' AND S_BS_NO = '"..outbound_wave.wave_no.."' AND N_B_STATE = 1"
        nRet, strRetInfo = mobox.existThisData( strLuaDEID, "Operation", strCondition )
        if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo )  end
        if ( strRetInfo == "yes" ) then 
            -- 存在正在执行的作业
            strCondition = "S_WAVE_NO = '"..outbound_wave.wave_no.."'"
            strUpdateSql = "N_B_STATE = 8 "  -- 关闭中
            nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Outbound_Wave", strCondition, strUpdateSql )
            if ( nRet ~= 0 ) then  
                lua.Error( strLuaDEID, debug.getinfo(1), "更新【出库波次】信息失败!"..strRetInfo )
            end                  
        else
            -- 已经没有正在执行的作业
            nRet, strRetInfo = jx_base.Set_Outbound_Wave_Force_Finish( strLuaDEID, outbound_wave.wave_no )
            if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), strRetInfo )  end 
        end
        -- 把作业状态 = 等待，等待前 的作业状态设置为 取消
        strCondition = "S_BS_TYPE = 'Outbound_Wave' AND S_BS_NO = '"..outbound_wave.wave_no.."' AND ( N_B_STATE = 0 or N_B_STATE = 6 or N_B_STATE = 8 )"
        strUpdateSql = "N_B_STATE = 7 "
        nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Operation", strCondition, strUpdateSql )
        if ( nRet ~= 0 ) then  
            lua.Error( strLuaDEID, debug.getinfo(1), "更新【作业】信息失败!"..strRetInfo )
        end  
    end
end